home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 11 / CU Amiga Magazine's Super CD-ROM 11 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-06].iso / cucd / utilities / rainboot / install-rainboot2 < prev    next >
Text File  |  1997-01-29  |  4KB  |  157 lines
  1. ; $VER: Install-Rainboot2 (29.01.97)
  2.  
  3. ;---------------------------- Strings --------------------------------------
  4. (set #kick39-msg "Kickstarts below v39 are not tested, so you might first consider testing the program before installing it.")
  5. (set #destdir-msg "Where you want Rainboot 2.0 to be installed? A drawer called Rainboot will be created.")
  6. (set #libs-msg "Copying libraries...")
  7. (set #dirname "Rainboot")
  8. (set #ptlib-msg "Do you want to install ptreplay.library? It is needed if you want to play Protracker modules with Rainboot2.")
  9. (set #ptlib-help "ptreplay.library is only needed if you want to play Protracker modules with Rainboot2.")
  10. (set #copy-msg "Copying files...")
  11. (set #example-msg "Which of these example configs do you want to install?")
  12. (set #fonts-msg "Do you want to install the fonts also? The examples won't work correctly without these fonts.")
  13. (set #fonts-help "FuturaB, FuturaL and GoudyB are going to be installed in your FONTS: drawer")
  14. (set #start-msg "Do you want Rainboot2 to be copied in your WBstartup drawer?")
  15. (set #start-help "Copying Rainboot2 to your WBStartup drawer closes the bootscreen at the end of the booting. This does not start a new Rainboot2 even if one isn't running. It only stops it.")
  16. (set #wbstart-msg "Where is your WBstartup drawer?")
  17. (set #edit-msg "Now you still have to edit your s:startup-sequence. Just put the line (one line!):\n\n")
  18. (set #edit-msg2 "\n\nsomewhere after the monitordrivers and reset your Amiga.\n(You might also need a MODEID or CGFX argument so check the docs for details)")
  19. (set #edit2-msg "If you want to use Rainboot2 you must first create a config-file (check the docs and the examples) and the put Rainboot2 in your startup-sequence. Somewhere after the monitordrivers is probably a good place")
  20. ;----------------------------------------------------------------------------
  21.  
  22. (if (< (/ (getversion) 65536) 39)
  23.     (message #kick39-msg)
  24. )
  25.  
  26. (set #destdir
  27.     (askdir
  28.         (prompt    #destdir-msg)
  29.         (help    @askdir-help)
  30.         (default "SYS:")
  31.     )
  32. )
  33.  
  34. (set @default-dest #destdir)
  35.  
  36. (makedir (tackon #destdir #dirname) (infos))
  37.  
  38. (copyfiles
  39.     (prompt #copy-msg)
  40.     (help @copyfiles-help)
  41.     (source "")
  42.     (dest (tackon #destdir #dirname))
  43.     (choices "Rainboot2" "Rainboot2.data" "Docs")
  44.     (infos)
  45. )
  46.  
  47. (makedir (tackon (tackon #destdir #dirname) "Configs") (infos))
  48.  
  49. (set #ptlib 
  50.     (askbool
  51.         (prompt #ptlib-msg)
  52.         (help #ptlib-help)
  53.         (default 1)
  54.     )
  55. )
  56.  
  57. (if #ptlib 
  58.     (copylib
  59.         (prompt #libs-msg)
  60.         (source "Libs/ptreplay.library")
  61.         (dest "LIBS:")
  62.         (help @copylib-help)
  63.         (confirm)
  64.     )
  65. )
  66.  
  67. (copylib
  68.     (prompt #libs-msg)
  69.     (source "Libs/iff.library")
  70.     (dest "LIBS:")
  71.     (help @copylib-help)
  72.     (confirm)
  73. )
  74.  
  75. (set #example
  76.     (askoptions
  77.         (prompt #example-msg)
  78.         (help @askoptions-help)
  79.         (choices "Black&White" "Demo")
  80.         (default 1)
  81.     )
  82. )
  83.  
  84. (if (in #example 0)
  85.     (copyfiles
  86.         (prompt #copy-msg)
  87.         (help @copyfiles-help)
  88.         (source "Configs")
  89.         (dest (tackon (tackon #destdir #dirname) "Configs"))
  90.         (pattern "Black&White#?")
  91.     )
  92. )
  93.  
  94. (if (in #example 1)
  95.     (copyfiles
  96.         (prompt #copy-msg)
  97.         (help @copyfiles-help)
  98.         (source "Configs")
  99.         (dest (tackon (tackon #destdir #dirname) "Configs"))
  100.         (pattern "(Demo#?|Black&White_glasses.8svx|Black&White.iff)")
  101.     )
  102. )
  103.  
  104. (set #fonts #example)
  105.  
  106. (if (= @user-level 2)
  107.     (if #example
  108.         (set #fonts
  109.             (askbool
  110.                 (prompt #fonts-msg)
  111.                 (help #fonts-help)
  112.                 (default 1)
  113.             )
  114.         )
  115.     )
  116. )
  117.  
  118. (if #fonts
  119.     (copyfiles
  120.         (prompt #copy-msg)
  121.         (help @copyfiles-help)
  122.         (source "Fonts")
  123.         (dest "FONTS:")
  124.         (all)
  125.     )
  126. )
  127.  
  128. (set #start
  129.     (askbool
  130.         (prompt #start-msg)
  131.         (help #start-help)
  132.         (default 1)
  133.     )
  134. )
  135.  
  136. (if #start
  137.     ((set #wbdir 
  138.         (askdir
  139.             (prompt    #wbstart-msg)
  140.             (help    @askdir-help)
  141.             (default "SYS:WBstartup")
  142.         )
  143.     )
  144.     (copyfiles
  145.         (prompt #copy-msg)
  146.         (help @copyfiles-help)
  147.         (source "")
  148.         (dest #wbdir)
  149.         (choices "Rainboot2" "Rainboot2.info")
  150.     ))
  151. )
  152.  
  153. (if (and #start (in #example 0))
  154.     (message #edit-msg (tackon (tackon #destdir #dirname) "Rainboot2 ") (tackon (tackon #destdir #dirname) "Configs/Black&White.config") #edit-msg2)
  155.     (message #edit2-msg)
  156. )
  157.